unit unewprgfrm;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ComCtrls,
  StdCtrls, EditBtn, Buttons;

type

  { Tf_newprgDlg }

  Tf_newprgDlg = class(TForm)
    btOk: TBitBtn;
    bt_Cancel: TBitBtn;
    cb_host: TComboBox;
    cb_login: TComboBox;
    ed_db: TEdit;
    ed_prjname: TEdit;
    ed_port: TEdit;
    lb_db1: TLabel;
    lb_host: TLabel;
    lb_login: TLabel;
    lb_db: TLabel;
    lb_port: TLabel;
    PageControl1: TPageControl;
    ts_connect: TTabSheet;
  private
    { private declarations }
  public
    { public declarations }
  end; 

var
  f_newprgDlg: Tf_newprgDlg;

implementation
uses sslib;

{$R *.lfm}

end.

